# Required fxn: 'cluster1 pps'

company=1:3

emps=c(2100,1910,3200)
sick=c(4320,4160,5790)
M=12950

# estimate mean and total
c1.pps('sick leave',sick,emps,M,'mean')

c1.pps('sick leave',sick,emps,M,'total')